RFER SRVR ".$rfer_srvr." RFER URL ".$refr_url; $datm=date("Y-m-d H:i:s", time()); include ("config.php"); $func_itms=explode("!!",$ipad); // print_r($func_itms); $func_func=$func_itms[0]; $func_ipad=$func_itms[1]; if(count($func_itms) == 3) { $func_mail=$func_itms[2]; } // echo "
FUNC ITMS ".$func_mail."
"; $sql= "SELECT * FROM bzkr where `ipad` = '$userip' order by `datm` desc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $tablresult = mysql_query($sql, $link); $tabl_num = mysql_num_rows($tablresult); // echo "
".$sql." BZKR FUNC Aantallen TABL NUM ".$tabl_num; $hrelt="xxxxx"; if ($tabl_num == 0) { $cmds_ipad=$userip; $cmds_bzv2=$rfer_url."[bzkr[".$invr_taal."[info@".$refr_srvr."[".$func_ipad."[1"; $lcmds_bzv2="Beginnen met uw gesprek"; // echo "
".$cmds_bzv2."
"; include ("chbt-cmds-code-2.php"); } if ($tabl_num > 0) { while ($row = mysql_fetch_assoc($tablresult)) { $id=$row['id']; $ipad=$row['ipad']; $domn=$row['domn']; $taal=$row['taal']; $lnks=$row['lnks']; $rchs=$row['rchs']; $levl=$row['levl']; $bzkr_levl=$levl+1; $datm=$row['datm']; $domn_itms=explode(",",$domn); // echo "
ID ".$id." IPAD ".$ipad." TAAL".$taal." DOMN ".$domn." LNKS ".$lnks." RCHS ".$rchs; // echo "
IPAD "; // print_r($bzkr_array); if ($func_func == "mail" and $func_mail != null) { $sql1 = "UPDATE bzkr SET `levl`='$bzkr_levl', `datm` ='$datm' WHERE `ipad`= '$userip' "; $logentry_result = mysql_query($sql1, $link); } $bzkr_array[$rchs."!!".$domn."!!".$lnks]=$bzkr_array[$rchs."!!".$domn."!!".$lnks]+1; } } // echo "
BZKR ARRAY ".$func_parm."
"; // print_r($bzkr_array); // echo "
Onze conversatie tot nu toe."; echo ""; // echo ""; foreach ($bzkr_array as $bzv1_key => $bzv1_val) { $bzv1_rslt=explode("!!",$bzv1_key); $bzv1_rchs=$bzv1_rslt[0]; $bzv1_domn=$bzv1_rslt[1]; $bzv1_lnks=$bzv1_rslt[2]; if ($bzv1_domn != $bzv1_rchs and $bzv1_domn != null) { // echo ""; } } // echo "
UitingTyperingInvalshoek
".$bzv1_domn."".$bzv1_lnks."".$bzv1_rchs."
"; ////////// // print_r($bzkr_array); return($bzkr_array); } ?> ".$func." INVOER ".urlencode($line)."
"; $rfer_srvr=$_SERVER['SERVER_NAME']; $rfer_url=$_SERVER['HTTP_REFERER']; $userip=$_SERVER['REMOTE_ADDR']; // echo "
RFER ".$rfer_url; require_once ("config.php"); // require_once("bwrk-bzkr-func.php"); require_once("xtrt-xxxx-func.php"); require_once ("tlkd-smts-func.php"); require_once("smta-tlkd-func-0017.php"); $invr_bzv1=$line; // echo "
".$modl." VOORAF INVR BZV1 ".$invr_bzv1." INVR CORP ".$invr_corp." INVR CONT ".$invr_cont." INVR TAAL ".$invr_taal." INVR CHBT ".$invr_chbt." INVR MAIL ".$invr_mail."INVR BZV2 ".$invr_bzv2."INVR DOMN".$invr_domn; $say_itms=explode(" ",$line); $invr_bzv1=str_replace("+"," ",$invr_bzv1); // echo "
SAY ITMS "; // print_r($say_itms); // trim($invr_bzv1); $smts_rslt=tlkd_smts($line); // require_once("time-laps-func.php"); // $ontl_rslt=time_laps($ontl_strt."@BEPL SMTS"); // echo $ontl_rslt; $invr_bzv1=str_replace("+"," ",$invr_bzv1); // echo "
SMTS ITMS "; // print_r($smts_rslt); $bzv1_itms=explode(" ",$invr_bzv1); $new_bzv1=""; // sort($smts_rslt); // echo ""; $srelt="XXXXX"; $st=0; // echo 'beterschap'; foreach($smts_rslt as $smts_key => $smts_val) { // echo "
SMTS KEY ".$smts_key." SMTS VAL ".$smts_val; $smts_itms=explode("!!",$smts_key); // print_r($smts_itms); $smts_type=$smts_itms[0]; $smts_sgmt=$smts_itms[1]; // echo "
SMTS TYPE ".$smts_type." SMTS SGMT ".$smts_sgmt; $ssmts_sgmt=str_replace(" ","+",$smts_sgmt); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $smts_text=$smts_itms[2]; $sgmt_itms=explode(" ",$smts_type); if (count($sgmt_itms) > 1) { // print_r($sgmt_itms); $itms_cntr=count($sgmt_itms); foreach($sgmt_itms as $itms_key => $itms_val) { // echo "
ITMS KEY ".$itms_key."ITMS VAL ".$itms_val; $subs_rslt=xtrt_xxxx("xdotx".$itms_val,"nederlands","subs"); foreach($subs_rslt as $subs_key => $subs_val) { $subs_dtls=explode("!!",$subs_key); // print_r($subs_dtls); $subs_word=$subs_dtls[2]; $subs_intp=$subs_dtls[3]; $subs_dale=$subs_dtls[7]; // echo "
SUBS WORD ".$subs_word; if ($itms_val == $subs_word) { // echo "
SUBS WORD ".$subs_word." ITMS VAL ".$itms_val; if ($irelt != $subs_intp) { // echo "
EUREKA ".$subs_dtls[2]." Interpretatie ".$subs_dtls[3].">>".$subs_dtls[7]; $gvkr_array[$st]=count($sgmt_itms)." ".$subs_key; $irelt = $subs_intp; } $st=$st+1; } } // echo "GEVOEL EN EMOTIES"; $subs_rslt=xtrt_xxxx("xdotx".$itms_val,"nederlands","gevl"); foreach($subs_rslt as $subs_key => $subs_val) { $subs_dtls=explode("!!",$subs_key); // print_r($subs_dtls); $subs_word=$subs_dtls[2]; $subs_intp=$subs_dtls[3]; $subs_dale=$subs_dtls[7]; // echo "
ITMS VAL ".$itms_val." SUBS WORD ".$subs_word." SUBS INTP ".$subs_intp." SUBS DALE ".$subs_dale; if ($itms_val == $subs_dale) { if ($grelt != $subs_dale) { // echo "
EUREKA ".$subs_word." Interpretatie ".$subs_intp.">>".$subs_dale; $gvkr_array[$st]=count($sgmt_itms)." ".$subs_key; $grelt = $subs_dale; } $st=$st+1; } } // $st=$st+1; } } } // echo "
GEVL TEXT ".$gevl_text; ////////////////////////////////////////// asort($gvkr_array); // print_r($gvkr_array); // echo "
KRKT TEXT ".$krkt_text; // echo "
GRAM TEXT ".$gram_text; // $gvkr_array[grammatica]=$gram_text; // $gvkr_array[karakter]=$krkt_text; // $gvkr_array[gevoel]=$gevl_text; // print_r($gvkr_array); return $gvkr_array; }  ".$modl_desc."
".$line."--".$taal; // echo " BEPAAL TAAL ".urlencode($line); /////////////// $mb_rslt=preg_split('/(?"; foreach($mb_rslt as $mb_key => $mb_val) { $mb_lowr=mb_strtolower($mb_val,'UTF-8'); $mb_text=$mb_text.$mb_lowr; } // echo "
TEST TLKD MB TEXT ".$mb_text; $mb_dtls=explode(" ",$mb_text); $new_mb=""; $tl=0; foreach($mb_dtls as $mb_key => $mb_val) { // echo "
KEY ".$mb_key." VAL ".$mb_val; $new_mb=$new_mb." ".$mb_val; } trim($new_mb); $unew_mb=urlencode($new_mb); $new_lnks=mb_strtolower($unew_mb); // echo "
NEW LINE ".$new_lnks; $line=urldecode($new_lnks); $line=trim($line); // echo "
".$modl_desc." ".$line." ".$taal." ".$tabel; $strn_val=$line; $scre_array=array(); $sw_mt=0; /////////////////////// echo "
"; $sqltref="SELECT * FROM aiml WHERE MATCH (pattern,template) AGAINST ('$line' IN NATURAL LANGUAGE MODE) order by `pattern` desc " ; // $sqltref="SELECT * , MATCH (pattern,template,topic) AGAINST ('$line' ) AS score FROM aiml WHERE MATCH (pattern,template,topic) AGAINST ('$line' ) order by `score` desc"; // $sqltref="SELECT * , MATCH (pattern,template,topic) AGAINST ('$line' ) AS score FROM wiml WHERE MATCH (pattern,template,topic) AGAINST ('$line' ) order by `score` desc"; if ($tabel == "aiml") { $sqltref="SELECT * , MATCH (pattern,template,filename) AGAINST ('$line' ) AS score FROM aiml WHERE MATCH (pattern,template,filename) AGAINST ('$line' ) order by `score` desc"; } if ($tabel == "wiml") { // $sqltref="SELECT * , MATCH (pattern,template,thatpattern) AGAINST ('$line' ) AS score FROM wiml WHERE MATCH (pattern,template,thatpattern) AGAINST ('$line' ) order by `score` desc"; } if ($tabel == "ftma") { // $sqltref="SELECT * , MATCH (pattern,template,filename) AGAINST ('$line' ) AS score FROM ftma WHERE MATCH (pattern,template,filename) AGAINST ('$line' ) order by `score` desc"; } $splt_bzv1=explode(" ",$line); $zoek_bzv1="%".$line."%"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $trefresult = mysql_query($sqltref, $link); $tref_num = mysql_num_rows($trefresult); // echo "
Aantallen ".$sqltref." ".$tref_num." SQL "; // echo "
"; // echo ""; if ($tref_num == 0) { // $scre_array["0@".$line."@".$template."@".$domn]=$scre_array[$scre."@".$pattern."@".$template."@".$domn]+1; // echo ""; } // echo "
You can select your chatbot here by selecting his profession and get to know his or her knowledge."; if ($tref_num > 0) { $corp_sw="0"; $kd=0; // echo ""; echo "
Er zijn ".$tref_num." entries gevonden voor uw uiting ".$wrds_form; while ($row = mysql_fetch_assoc($trefresult) and $kd <32 ) { $scre=$row['score']; $id=$row['id']; $pattern=$row['pattern']; $thatpattern=$row['thatpattern']; $template=$row['template']; $topic=$row['topic']; $intention=$row['filename']; $scre= round($scre, 2); $nscr="00".$scre."00"; // echo "
PATTERN ".$pattern." TEMPLATE ".$template; if (strlen($scre)== 1) { $nscre=substr($nscr,0,4); } if (strlen($scre)== 2) { $nscre=substr($nscr,1,4); } if (strlen($scre)== 3) { $nscre=substr($nscr,2,4); } $splt_intn=explode("@",$intention); $usag_intn=$splt_intn[0]; $usag_extn=$splt_intn[1]; if ($hrelt != $pattern) { $kd=$kd+1; $cpattern="".$pattern.""; $ctemplate="".$template.""; echo ""; // echo "
NSCRE ".$nscre; $scre_array[$nscre."@".$topic."@".$pattern."@".$thatpattern."@".$template."@".$usag_intn]=$scre_array[$nscre."@".$topic."@".$pattern."@".$thatpattern."@".$template."@".$usag_intn]+1; // echo ""; $hrelt=$pattern; // echo "
ToelichtingTemplatePatternOnderwerp
GEEN DIRECT RESULTAAT ".$cpattern."".$ctemplate."
SemantaGesprekspartnerCorpusKennisdomein
".$cpattern."
".$cpattern."".$ctemplate."
".$cpattern."".$ctemplate."".$usag_intn."".$usag_extn.""; } $domn_array[$domn]=$domn_array[$domn]+1; } } echo "
"; // echo "
Pandorabots entries: ".count($scre_array); // print_r($scre_array); krsort($scre_array); return($scre_array); } ?>
REFR MODF semanta.nl
Kan ik met Semanta een computer leren praten?Gesprekspartner

".$domn_chbt."		Lingvistica heeft de basis gelegd voor een volmondig JA
Corpustaal

nederlands		Kennisdomein

".$domn_domn."		Corpus

".$domn_corp."
Wat willt U ".$domn_chbt." vragen over ".$domn_corp."
Uiting
E-mail Gesprekstaal Invalshoek Analyseresultaat
Verzend
Segmenten:
"; foreach($gvkr_rslt as $smts_key => $smts_val) { // echo "
".$smts_key." ".$smts_val; $smts_itms=explode("!!",$smts_key); $smts_type=$smts_itms[0]; $smts_sgmt=$smts_itms[1]; $smts_text=$smts_itms[2]; $sgmt_itms=explode(" ",$smts_text); $itms_cntr=count($sgmt_itms); } // echo "
VOORAF INVR IPAD ".$invr_ipad." INVR BZV1 ".$invr_bzv1." INVR CORP ".$invr_corp." INVR CONT ".$invr_cont." INVR TAAL ".$invr_taal." INVR CHBT ".$invr_chbt." INVR MAIL ".$invr_mail."INVR BZV2 ".$invr_bzv2."INVR DOMN".$invr_domn; //////////////////////////////////// if ($handle = opendir('./data')) { { while (false !== ($entry = readdir($handle)) ) { // echo "
ENTRY ".$entry; if ($entry != "." && $entry != "..") { $line_cntr=0; // print_r($corp_rslt); if ($entry[0] == $invr_cont and $invr_domn == null) { $file_array[$e]= $entry; // echo "
ENTRY ".$entry; } if ($invr_corp == $entry) { $file_array[$e]= $entry; // echo "
ENTRY ".$entry; } $e=$e+1; } } } } $sw=0; foreach($file_array as $corp_key => $corp_name) { // echo "
INVR CORP ".$invr_corp." CORP NAME ".$corp_name; if ($invr_corp== $corp_name) { echo "
Wij kennen ".$invr_corp." het corpus is geconverteerd naar de kennisbank van Lingvistica."; $text_file="./data/".$invr_corp."/lnk00000.dat"; // echo "
TEXTFILE ".$text_file." ".filesize($text_file)."
"; $open_corp=$text_file; $f = fopen($text_file, "r"); $word_count=0; $line_count=0; $full_docm=""; $f = fopen($text_file, "r"); $word_count=0; $line_count=0; $full_docm=""; while ($line = fgets($f, 1000)) { $full_docm=$full_docm." ".$line; // echo "
LINE ".urlencode($line); ///////////// // $str = utf8_encode($line); $str = iconv('ascii', 'ASCII//TRANSLIT', $line); $save_bzv1=$invr_bzv1; $invr_bzv1=trim($str); // echo "
Na het trimmen ".$invr_bzv1; $invr_bzv1=str_replace("?",".",$invr_bzv1); $invr_bzv1=str_replace("&","",$invr_bzv1); $invr_bzv1=str_replace("!",".",$invr_bzv1); $invr_bzv1=str_replace("·","-",$invr_bzv1); $invr_bzv1=str_replace("/","-",$invr_bzv1); $invr_bzv1=str_replace("|",",",$invr_bzv1); $invr_bzv1=str_replace(",,",",",$invr_bzv1); $invr_bzv1=str_replace("zn.","znw,",$invr_bzv1); $invr_bzv1=str_replace("vrl.","vrlk znw,",$invr_bzv1); $invr_bzv1=str_replace("meerv.","mvd,",$invr_bzv1); $invr_bzv1=str_replace("iem.","iemand",$invr_bzv1); $invr_bzv1=str_replace("bn.","bvn,",$invr_bzv1); $invr_bzv1=str_replace("bijw.","bwd,",$invr_bzv1); $invr_bzv1=str_replace("tgov.","tegenover,",$invr_bzv1); $invr_bzv1=str_replace("tussenw..","twp,",$invr_bzv1); $invr_bzv1=str_replace("Lat.","latijn,",$invr_bzv1); $invr_bzv1=str_replace("Gr.","grieks,",$invr_bzv1); $invr_bzv1=str_replace("Fr.","frans,",$invr_bzv1); $invr_bzv1=str_replace("Du.","duits,",$invr_bzv1); $invr_bzv1=str_replace("dr.","dokter,",$invr_bzv1); $invr_bzv1=str_replace("Eng.","engels,",$invr_bzv1); $invr_bzv1=str_replace("m.n.","met name ,",$invr_bzv1); $invr_bzv1=str_replace("o.a.","oa",$invr_bzv1); $invr_bzv1=str_replace("resp.","respectievelijk",$invr_bzv1); $invr_bzv1=str_replace("alg.","algemeen",$invr_bzv1); $invr_bzv1=str_replace("(niet:"," ",$invr_bzv1); $invr_bzv1=str_replace("onpers.","onpersoonlijk",$invr_bzv1); $invr_bzv1=str_replace("versch.","verschillende",$invr_bzv1); // $invr_bzv1=str_replace("h.","hebben,",$invr_bzv1); $invr_bzv1=str_replace("voorz.","vzt",$invr_bzv1); $invr_bzv1=str_replace("bijv. naamw.","bvn,",$invr_bzv1); $invr_bzv1=str_replace("onovergank.","onv,",$invr_bzv1); $invr_bzv1=str_replace("overgank.","ovg,",$invr_bzv1); $invr_bzv1=str_replace("werkw.;","wwd,",$invr_bzv1); $invr_bzv1=str_replace("(geen afbreking)","",$invr_bzv1); $invr_bzv1=str_replace("°","graden ",$invr_bzv1); $invr_bzv1=str_replace("•",",",$invr_bzv1); $invr_bzv1=str_replace("niet: ","",$invr_bzv1); $invr_bzv1=str_replace("11"," ",$invr_bzv1); $invr_bzv1=str_replace("22"," ",$invr_bzv1); $invr_bzv1=str_replace("33"," ",$invr_bzv1); $invr_bzv1=str_replace("44"," ",$invr_bzv1); $invr_bzv1=str_replace("55"," ",$invr_bzv1); $invr_bzv1=str_replace("—","",$invr_bzv1); $invr_bzv1=str_replace(" & ",",",$invr_bzv1); $invr_bzv1=str_replace("Ÿ"," ",$invr_bzv1); $invr_bzv1=str_replace(" 10 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 11 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 12 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 13 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 14 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 15 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 16 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 17 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" a Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 1 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 2 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 3 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 2 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 3 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 4 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 5 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 6 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 7 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 8 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" 9 Ÿ ","=",$invr_bzv1); $invr_bzv1=str_replace(" (m.)",",mnlk, ",$invr_bzv1); $invr_bzv1=str_replace(" (v.)",",vrlk, ",$invr_bzv1); $invr_bzv1=str_replace(" /v.)",",vrlk, ",$invr_bzv1); $invr_bzv1=str_replace("bep.",",bepaald ",$invr_bzv1); $invr_bzv1=str_replace("ben.",",benaming ",$invr_bzv1); $invr_bzv1=str_replace("Ned.",",nederlands ",$invr_bzv1); $invr_bzv1=str_replace("biochem.","biochemie ",$invr_bzv1); $invr_bzv1=str_replace("Fr.",",frans ",$invr_bzv1); $invr_bzv1=str_replace("/",",",$invr_bzv1); $invr_bzv1=str_replace("‹","ori=",$invr_bzv1); $invr_bzv1=str_replace(";",",",$invr_bzv1); $invr_bzv1=str_replace("-tje",",tje,",$invr_bzv1); $invr_bzv1=str_replace("-pje",",pje,",$invr_bzv1); $invr_bzv1=str_replace("-ten",",ten,",$invr_bzv1); $invr_bzv1=str_replace("-’s","-’s,",$invr_bzv1); $invr_bzv1=str_replace("....",".",$invr_bzv1); $invr_bzv1=str_replace(", ,",",",$invr_bzv1); $invr_bzv1=str_replace("•",",mrf",$invr_bzv1); $invr_bzv1=strtolower($invr_bzv1); if ($invr_bzv1 != null) { // echo "
FINISHED INVR BZV1 ".$invr_bzv1; } } // $invr_bzv1=$save_bzv1; // echo "
VOORAF INVR IPAD ".$invr_ipad." INVR BZV1 ".$invr_bzv1." INVR CORP ".$invr_corp." INVR CONT ".$invr_cont." INVR TAAL ".$invr_taal." INVR CHBT ".$invr_chbt." INVR MAIL ".$invr_mail."INVR BZV2 ".$invr_bzv2."INVR DOMN".$invr_domn; // echo "
FULL DOCM ".strlen($full_docm); $full_lnes=explode(".",$full_docm); foreach($full_lnes as $full_key => $full_val) { $asts_lnes=explode("*",$full_val); // echo "
FULL TEXT ".$full_key."-".$full_val; } // echo "
".$text_file; $sw=1; } } if ($sw == 0) { echo "
Het corpus van ".$invr_corp." is nog niet geconverteerd naar de kennisbank van Lingvistica."; } //////////////////////// BEVAT FOUT ////////////////// /////////////////////// // echo "
INVR BZV1 ".$invr_bzv1; if ($invr_mail == null) { echo "
Er lijkt iets mis met uw e-mailadres ".$invr_mail."
U kunt het opnieuw proberen."; exit; } else { // echo "Openingsgesprek over het corpus ".$invr_corp." van de website van ".$invr_ipad." tussen Semanta en ".$invr_chbt." in het kennisdomein ".$invr_domn; } $mail_itms=explode("@",$invr_mail); $mail_bzkr=$mail_itms[0]; $mail_host=$mail_itms[1]; $host_dtls=explode(".",$mail_host); // print_r($host_dtls); $host_domn=$host_dtls[0]; $host_ipcd=$host_dtls[1]; if (count($mail_itms) != 2 or count($host_dtls) < 2 ) { echo "
Er lijkt iets mis met uw e-mailadres ".$invr_mail." U kunt het opnieuw proberen,"; exit; } // print_r($host_dtls); require_once("ipcd-taal-func.php"); $ipcd_taal=ipcd_taal($host_ipcd); // echo "
IPCD TAAL ".$ipcd_taal; if($ipcd_taal == "invrtaal" and $invr_taal== null) { echo "
De taal van de server ".$mail_host." is nog niet vast te stellen. Wij hebben een keuze gemaakt voor ".$invr_taal; } if(($ipcd_taal == "invrtaal" or $ipcd_taal == null) and $invr_taal != null) { echo "Hallo ".$mail_bzkr." vanaf ".$mail_host." .De taal van de server is niet vast te stellen wij hebben een keuze gemaakt voor ".$invr_taal; } else { if($ipcd_taal == "invrtaal" or $ipcd_taal == null) { echo "Hallo ".$mail_bzkr." vanaf ".$mail_host." we gaan verder in het ".$invr_taal." en de servertaal is ".$invr_taal." "; echo ". Met kunt u voor het ".$ipcd_taal." kiezen."; } } /////////////// // echo "
Uw naam is ".$invr_bzkr." uw moedertaal is ".$invr_taal." het woord dat u heeft gegeven is ".$invr_bzv2." en u wilt praten over ".$invr_bzv1; $cmds_ipad=$invr_mail; $cmds_bzv2=$invr_bzv2."[bzkr[".$invr_taal."[".$invr_bzv1."[".$invr_func."[1"; // echo "
KNMK INVR BZV2 ".$cmds_bzv2."
"; include ("chbt-cmds-code-2.php"); ////////////// // echo "
INVR BZV1 ".$invr_bzv1; $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $lbzv1_bzv1="Praat met ".$invr_chbt." over ".$invr_bzv1.""; echo "
".$lbzv1_bzv1; echo "
"; // print_r($asts_lnes); echo ""; echo "Huidige uiting"; echo "
".$bzv1_bzkr."".$lbzv1_bzv1."".$bzv1_bzv2."
"; $bwrk_rslt=bwrk_bzkr("mail!!".$userip."!!".$invr_mail); ?>